home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 4 / developer source - volume 4.iso / parad / may94 / btfig09b.gif < prev    next >
Graphics Interchange Format  |  1996-07-02  |  33.0 KB  |  581x347  |  4-bit (14 colors)
   ocr: l MAINEHFormlEaction nethod action(var eventinfo ActionEvent) if eventinfo.1sPreFilterO) then ; This code executes for each object on the form. else 1 This code executes only for the form. switch Close the application if all of the forms can be closed. case eventinfo.1d0) = Useraction + Closeappaction : if sySLID.closeallformsL(Desktop"? then close) endif C Close all windows. case eventinfo.1d0) = Useraction + ClosewindowsAction !: sysLib.closeallformsL("Desktop"? endswitch endif endMethod Edit Line: 16 Col: 61